(*----------------------------------------------------------------------
  :Program.    Io.def
  :Contents.   Abspeichern und Laden einer Gadget-Struktur
  :Author.     Hubert Bildstein
  :Copyright.  Public Domain
  :Language.   Modula-2
  :Translator. M2Amiga V3.3d
  :History.    V1.0   5.12.1990
----------------------------------------------------------------------*)

DEFINITION MODULE Io;
(* Modul zur Ein/Ausgabe der Gadgetinformationen *)

FROM SYSTEM     IMPORT ADDRESS, BYTE;
FROM FileSystem IMPORT Response;

PROCEDURE Load (    name   : ARRAY OF CHAR;
                VAR Feld   : ARRAY OF BYTE;
                VAR WFeld  : ARRAY OF BYTE;
                VAR length : LONGINT) : Response;
(* Einladen der Gadgetinformation in ein Feld *)


PROCEDURE Save (name   : ARRAY OF CHAR;
                adr1   : ADDRESS;
                len1   : LONGINT;
                adr2   : ADDRESS;
                len2   : LONGINT) : Response;
(* Speichern der Gadgetinformationen *)


END Io.
